#!/usr/bin/perl

use strict;

my %hash = ();

$hash{name} = "joshua";
$hash{city} = "Kuala Lumpur";

print "@{[%hash]}\n";
print "$hash{city}\n";